home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / pascal / ptrp10.zip / TEST5.TRP < prev    next >
Text File  |  1994-05-17  |  229b  |  12 lines
  1. procedure main
  2.         local 
  3.                 v : integer;
  4.         endvar
  5.         v := 15;
  6.         if (v > 5)
  7.                 writeln("Bigger than 5")
  8.         else
  9.                 writeln("<= 5")
  10.         endif
  11. endproc
  12.